home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / source / a2.0bemacs-src.lha / Emacs-19.25 / src / data_protos.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-08-18  |  6.9 KB  |  458 lines
  1. /* Prototypes for functions defined in
  2. data.c
  3.  */
  4.  
  5. extern int Qnil;
  6.  
  7. extern int Qt;
  8.  
  9. extern int Qquote;
  10.  
  11. extern int Qlambda;
  12.  
  13. extern int Qsubr;
  14.  
  15. extern int Qunbound;
  16.  
  17. extern int Qerror_conditions;
  18.  
  19. extern int Qerror_message;
  20.  
  21. extern int Qtop_level;
  22.  
  23. extern int Qerror;
  24.  
  25. extern int Qquit;
  26.  
  27. extern int Qwrong_type_argument;
  28.  
  29. extern int Qargs_out_of_range;
  30.  
  31. extern int Qvoid_variable;
  32.  
  33. extern int Qvoid_function;
  34.  
  35. extern int Qcyclic_function_indirection;
  36.  
  37. extern int Qsetting_constant;
  38.  
  39. extern int Qinvalid_read_syntax;
  40.  
  41. extern int Qinvalid_function;
  42.  
  43. extern int Qwrong_number_of_arguments;
  44.  
  45. extern int Qno_catch;
  46.  
  47. extern int Qend_of_file;
  48.  
  49. extern int Qarith_error;
  50.  
  51. extern int Qmark_inactive;
  52.  
  53. extern int Qbeginning_of_buffer;
  54.  
  55. extern int Qend_of_buffer;
  56.  
  57. extern int Qbuffer_read_only;
  58.  
  59. extern int Qintegerp;
  60.  
  61. extern int Qnatnump;
  62.  
  63. extern int Qwholenump;
  64.  
  65. extern int Qsymbolp;
  66.  
  67. extern int Qlistp;
  68.  
  69. extern int Qconsp;
  70.  
  71. extern int Qstringp;
  72.  
  73. extern int Qarrayp;
  74.  
  75. extern int Qsequencep;
  76.  
  77. extern int Qbufferp;
  78.  
  79. extern int Qchar_or_string_p;
  80.  
  81. extern int Qmarkerp;
  82.  
  83. extern int Qinteger_or_marker_p;
  84.  
  85. extern int Qvectorp;
  86.  
  87. extern int Qbuffer_or_string_p;
  88.  
  89. extern int Qboundp;
  90.  
  91. extern int Qfboundp;
  92.  
  93. extern int Qcdr;
  94.  
  95. extern int Qrange_error;
  96.  
  97. extern int Qdomain_error;
  98.  
  99. extern int Qsingularity_error;
  100.  
  101. extern int Qoverflow_error;
  102.  
  103. extern int Qunderflow_error;
  104.  
  105. int wrong_type_argument(register int predicate,
  106.                         register int value);
  107.  
  108. int pure_write_error(void);
  109.  
  110. void args_out_of_range(int a1,
  111.                        int a2);
  112.  
  113. void args_out_of_range_3(int a1,
  114.                          int a2,
  115.                          int a3);
  116.  
  117. int make_number(int num);
  118.  
  119. extern int sign_extend_temp;
  120.  
  121. int sign_extend_lisp_int(int num);
  122.  
  123. extern struct Lisp_Subr Seq;
  124.  
  125. int Feq(int , int );
  126.  
  127. extern struct Lisp_Subr Snull;
  128.  
  129. int Fnull(int );
  130.  
  131. extern struct Lisp_Subr Sconsp;
  132.  
  133. int Fconsp(int );
  134.  
  135. extern struct Lisp_Subr Satom;
  136.  
  137. int Fatom(int );
  138.  
  139. extern struct Lisp_Subr Slistp;
  140.  
  141. int Flistp(int );
  142.  
  143. extern struct Lisp_Subr Snlistp;
  144.  
  145. int Fnlistp(int );
  146.  
  147. extern struct Lisp_Subr Ssymbolp;
  148.  
  149. int Fsymbolp(int );
  150.  
  151. extern struct Lisp_Subr Svectorp;
  152.  
  153. int Fvectorp(int );
  154.  
  155. extern struct Lisp_Subr Sstringp;
  156.  
  157. int Fstringp(int );
  158.  
  159. extern struct Lisp_Subr Sarrayp;
  160.  
  161. int Farrayp(int );
  162.  
  163. extern struct Lisp_Subr Ssequencep;
  164.  
  165. int Fsequencep(int );
  166.  
  167. extern struct Lisp_Subr Sbufferp;
  168.  
  169. int Fbufferp(int );
  170.  
  171. extern struct Lisp_Subr Smarkerp;
  172.  
  173. int Fmarkerp(int );
  174.  
  175. extern struct Lisp_Subr Ssubrp;
  176.  
  177. int Fsubrp(int );
  178.  
  179. extern struct Lisp_Subr Sbyte_code_function_p;
  180.  
  181. int Fbyte_code_function_p(int );
  182.  
  183. extern struct Lisp_Subr Schar_or_string_p;
  184.  
  185. int Fchar_or_string_p(int );
  186.  
  187. extern struct Lisp_Subr Sintegerp;
  188.  
  189. int Fintegerp(int );
  190.  
  191. extern struct Lisp_Subr Sinteger_or_marker_p;
  192.  
  193. int Finteger_or_marker_p(int );
  194.  
  195. extern struct Lisp_Subr Snatnump;
  196.  
  197. int Fnatnump(int );
  198.  
  199. extern struct Lisp_Subr Snumberp;
  200.  
  201. int Fnumberp(int );
  202.  
  203. extern struct Lisp_Subr Snumber_or_marker_p;
  204.  
  205. int Fnumber_or_marker_p(int );
  206.  
  207. extern struct Lisp_Subr Scar;
  208.  
  209. int Fcar(int );
  210.  
  211. extern struct Lisp_Subr Scar_safe;
  212.  
  213. int Fcar_safe(int );
  214.  
  215. extern struct Lisp_Subr Scdr;
  216.  
  217. int Fcdr(int );
  218.  
  219. extern struct Lisp_Subr Scdr_safe;
  220.  
  221. int Fcdr_safe(int );
  222.  
  223. extern struct Lisp_Subr Ssetcar;
  224.  
  225. int Fsetcar(int , int );
  226.  
  227. extern struct Lisp_Subr Ssetcdr;
  228.  
  229. int Fsetcdr(int , int );
  230.  
  231. extern struct Lisp_Subr Sboundp;
  232.  
  233. int Fboundp(int );
  234.  
  235. extern struct Lisp_Subr Sfboundp;
  236.  
  237. int Ffboundp(int );
  238.  
  239. extern struct Lisp_Subr Smakunbound;
  240.  
  241. int Fmakunbound(int );
  242.  
  243. extern struct Lisp_Subr Sfmakunbound;
  244.  
  245. int Ffmakunbound(int );
  246.  
  247. extern struct Lisp_Subr Ssymbol_function;
  248.  
  249. int Fsymbol_function(int );
  250.  
  251. extern struct Lisp_Subr Ssymbol_plist;
  252.  
  253. int Fsymbol_plist(int );
  254.  
  255. extern struct Lisp_Subr Ssymbol_name;
  256.  
  257. int Fsymbol_name(int );
  258.  
  259. extern struct Lisp_Subr Sfset;
  260.  
  261. int Ffset(int , int );
  262.  
  263. extern struct Lisp_Subr Sdefalias;
  264.  
  265. int Fdefalias(int , int );
  266.  
  267. extern struct Lisp_Subr Sdefine_function;
  268.  
  269. int Fdefine_function(int , int );
  270.  
  271. extern struct Lisp_Subr Ssetplist;
  272.  
  273. int Fsetplist(int , int );
  274.  
  275. int do_symval_forwarding(register int valcontents);
  276.  
  277. void store_symval_forwarding(int sym,
  278.                              register int valcontents,
  279.                              register int newval);
  280.  
  281. int swap_in_symval_forwarding(int sym,
  282.                               int valcontents);
  283.  
  284. int find_symbol_value(int sym);
  285.  
  286. extern struct Lisp_Subr Ssymbol_value;
  287.  
  288. int Fsymbol_value(int );
  289.  
  290. extern struct Lisp_Subr Sset;
  291.  
  292. int Fset(int , int );
  293.  
  294. int default_value(int sym);
  295.  
  296. extern struct Lisp_Subr Sdefault_boundp;
  297.  
  298. int Fdefault_boundp(int );
  299.  
  300. extern struct Lisp_Subr Sdefault_value;
  301.  
  302. int Fdefault_value(int );
  303.  
  304. extern struct Lisp_Subr Sset_default;
  305.  
  306. int Fset_default(int , int );
  307.  
  308. extern struct Lisp_Subr Ssetq_default;
  309.  
  310. int Fsetq_default(int );
  311.  
  312. extern struct Lisp_Subr Smake_variable_buffer_local;
  313.  
  314. int Fmake_variable_buffer_local(int );
  315.  
  316. extern struct Lisp_Subr Smake_local_variable;
  317.  
  318. int Fmake_local_variable(int );
  319.  
  320. extern struct Lisp_Subr Skill_local_variable;
  321.  
  322. int Fkill_local_variable(int );
  323.  
  324. int indirect_function(register int object);
  325.  
  326. extern struct Lisp_Subr Sindirect_function;
  327.  
  328. int Findirect_function(int );
  329.  
  330. extern struct Lisp_Subr Saref;
  331.  
  332. int Faref(int , int );
  333.  
  334. extern struct Lisp_Subr Saset;
  335.  
  336. int Faset(int , int , int );
  337.  
  338. int Farray_length(register int array);
  339.  
  340. int arithcompare(int num1,
  341.                  int num2,
  342.                  enum comparison comparison);
  343.  
  344. extern struct Lisp_Subr Seqlsign;
  345.  
  346. int Feqlsign(int , int );
  347.  
  348. extern struct Lisp_Subr Slss;
  349.  
  350. int Flss(int , int );
  351.  
  352. extern struct Lisp_Subr Sgtr;
  353.  
  354. int Fgtr(int , int );
  355.  
  356. extern struct Lisp_Subr Sleq;
  357.  
  358. int Fleq(int , int );
  359.  
  360. extern struct Lisp_Subr Sgeq;
  361.  
  362. int Fgeq(int , int );
  363.  
  364. extern struct Lisp_Subr Sneq;
  365.  
  366. int Fneq(int , int );
  367.  
  368. extern struct Lisp_Subr Szerop;
  369.  
  370. int Fzerop(int );
  371.  
  372. int long_to_cons(unsigned long i);
  373.  
  374. unsigned long cons_to_long(int c);
  375.  
  376. extern struct Lisp_Subr Snumber_to_string;
  377.  
  378. int Fnumber_to_string(int );
  379.  
  380. extern struct Lisp_Subr Sstring_to_number;
  381.  
  382. int Fstring_to_number(int );
  383.  
  384. int arith_driver(enum arithop code,
  385.                  int nargs,
  386.                  register int * args);
  387.  
  388. extern struct Lisp_Subr Splus;
  389.  
  390. int Fplus(int , int * );
  391.  
  392. extern struct Lisp_Subr Sminus;
  393.  
  394. int Fminus(int , int * );
  395.  
  396. extern struct Lisp_Subr Stimes;
  397.  
  398. int Ftimes(int , int * );
  399.  
  400. extern struct Lisp_Subr Squo;
  401.  
  402. int Fquo(int , int * );
  403.  
  404. extern struct Lisp_Subr Srem;
  405.  
  406. int Frem(int , int );
  407.  
  408. extern struct Lisp_Subr Smod;
  409.  
  410. int Fmod(int , int );
  411.  
  412. extern struct Lisp_Subr Smax;
  413.  
  414. int Fmax(int , int * );
  415.  
  416. extern struct Lisp_Subr Smin;
  417.  
  418. int Fmin(int , int * );
  419.  
  420. extern struct Lisp_Subr Slogand;
  421.  
  422. int Flogand(int , int * );
  423.  
  424. extern struct Lisp_Subr Slogior;
  425.  
  426. int Flogior(int , int * );
  427.  
  428. extern struct Lisp_Subr Slogxor;
  429.  
  430. int Flogxor(int , int * );
  431.  
  432. extern struct Lisp_Subr Sash;
  433.  
  434. int Fash(int , int );
  435.  
  436. extern struct Lisp_Subr Slsh;
  437.  
  438. int Flsh(int , int );
  439.  
  440. extern struct Lisp_Subr Sadd1;
  441.  
  442. int Fadd1(int );
  443.  
  444. extern struct Lisp_Subr Ssub1;
  445.  
  446. int Fsub1(int );
  447.  
  448. extern struct Lisp_Subr Slognot;
  449.  
  450. int Flognot(int );
  451.  
  452. void syms_of_data(void);
  453.  
  454. void arith_error(int signo);
  455.  
  456. int init_data(void);
  457.  
  458.